home *** CD-ROM | disk | FTP | other *** search
/ Nebula 2 / Nebula Two.iso / Apps / ScreenSavers / BackSpaceViews / StarShipView.BackModule / StarShipView.m < prev    next >
Encoding:
Text File  |  1995-06-12  |  13.3 KB  |  574 lines
  1. #import "StarShipView.h"
  2. #import "NewSpaceView.h"
  3. #import "Thinker.h"
  4. #import <stdio.h>
  5. #import "StarShipProtocol.h"
  6. #import <dpsclient/wraps.h>
  7.  
  8.  
  9. #define sliderDelay    2000
  10.  
  11. @implementation StarShipView
  12.  
  13. static char **bundleFilenameList;
  14.  
  15.  
  16. + initialize
  17. {
  18.     if ( self == [StarShipView class] )
  19.     {
  20.        static NXDefaultsVector starShipDefs = {
  21.         {"StarShipObjectSpeed",        "180"},
  22.         {"StarShipIntervalTime",    "5"},
  23.         {"StarShipAnimationSpeed",    "500"},
  24.         {"StarShipCycleCount",    "250"},
  25.         {"StarShipSound",    "1"},
  26.         {"StarShipStarSpeed",    "1"},
  27.         {NULL}
  28.        };
  29.  
  30.        NXRegisterDefaults([NXApp appName], starShipDefs);
  31.     }
  32.     return self;
  33. }
  34.  
  35. - oneStep
  36. {
  37.     if (viewScreenResized){ //tell everybody about it
  38.         if(controllerTypeCount > 0){
  39.             [spaceTypeController setBoundsRect: &newViewScreenSize];
  40.             //set new clip area
  41.             NXSetRect(&clipRect,newViewScreenSize.origin.x,
  42.              newViewScreenSize.origin.y,newViewScreenSize.size.width,
  43.              newViewScreenSize.size.height);
  44.              // numbers have to do with size of the viewscreen border
  45.             clipRect.origin.x += 3.0;
  46.             clipRect.origin.y += 3.0;;
  47.             clipRect.size.width -= 6.0;
  48.             clipRect.size.height -= 6.0;
  49.             rectPtr = &clipRect;
  50.         }
  51.         viewScreenResized = NO;        
  52.  
  53.     }
  54.     if (controllerTypeCount > 0){   // they exist
  55.         NXRectClip(rectPtr);  //clip to screen border
  56.         if ([spaceTypeController doUntilDone]){
  57.             [spaceTypeController freeResources];
  58.             controllerIndex++;
  59.             if (controllerIndex >= controllerTypeCount)
  60.                 controllerIndex = 0;
  61.             spaceTypeController =  [controllerList
  62.             objectAt:controllerIndex];
  63.             if(soundGood){
  64.                 [spaceTypeController setPwrDownSnd:pwrDownSnd];
  65.                 [spaceTypeController setPwrUpSnd:pwrUpSnd];
  66.             }
  67.             [self setModuleBox];  //update module info in inspector window    
  68.  
  69.             [viewScreen setBodyControllerOutlet:spaceTypeController];
  70.             [spaceTypeController setStarsOutlet:viewScreen];
  71.             //send module all slider values
  72.             firstTimeSound = 1;  //don't want to play sound at startup
  73.             [self setSound:soundMatrix];
  74.             [self setStarSpeed:starSpeedSlider];
  75.             [self setAnimationSpeed:animationSlider];
  76.             [self setObjectInterval:objectIntervalSlider];
  77.             [self setObjectSpeed:objectSpeedSlider];
  78.             [self setCycleCount:cycleCountSlider];
  79.             [spaceTypeController setBoundsRect: &newViewScreenSize];
  80.             [spaceTypeController setFirstState];
  81.  
  82.             
  83.         }
  84.         PSinitclip();    //turn off clipping
  85.     }
  86.     
  87.     [viewScreen oneStep];
  88.  
  89.     if(frameRate > 1)
  90.         xmach_sleep(port, frameRate);
  91.  
  92.     return self;
  93.  
  94. }
  95. - (BOOL)makeSndObjects: (char *)directory
  96. {
  97. char buf[MAXPATHLEN + 1];
  98.     
  99.     soundGood = YES;
  100.     sprintf(buf,"%s/pwrDown.snd",directory);
  101.     pwrDownSnd = [[Sound alloc] initFromSoundfile:buf];
  102.     if(pwrDownSnd == nil){
  103.         soundGood = NO;
  104.         printf("unable to create sound object %s\n",buf);
  105.     }
  106.     sprintf(buf,"%s/pwrUp.snd",directory);
  107.     pwrUpSnd = [[Sound alloc] initFromSoundfile:buf];
  108.     if(pwrUpSnd == nil){
  109.         soundGood = NO;
  110.         printf("unable to create sound object %s\n",buf);
  111.     }
  112.     sprintf(buf,"%s/sound.snd",directory);
  113.     sound = [[Sound alloc] initFromSoundfile:buf];
  114.     if(sound == nil){
  115.         soundGood = NO;
  116.         printf("unable to create sound object %s\n",buf);
  117.     }
  118.     return soundGood;
  119. }
  120.  
  121. //*********************************
  122. // this builds a list of bundles in the StarShipView.BackModule bundle
  123. // and instantiates first bundle object
  124. // there must be a class object that is same as bundle name
  125. // The idea here is build a list of space object controllers
  126. // like celestial body controllers, ship controllers, etc
  127.  
  128. - buildControllerList: (char *)directory
  129. {
  130. NXBundle * tmpBundle;
  131. char buf[MAXPATHLEN + 1];    
  132. short ii,successCount;
  133.     
  134.     controllerTypeCount = [self searchDirectory: directory];
  135.     controllerList = [[List alloc] initCount:controllerTypeCount];
  136.     
  137.     successCount = 0;
  138.     if(controllerTypeCount > 0){//there are some
  139.         successCount = 0;
  140.         for(ii = 0; ii < controllerTypeCount; ii++){
  141.             sprintf(buf,"%s/%s.bundle",directory,bundleFilenameList[ii]);
  142.  
  143.             if((tmpBundle = [[NXBundle alloc] initForDirectory:buf]) == nil)
  144.                 printf("could not create bundle object for %s\n",buf);
  145.             else {
  146.                 if((spaceTypeController = [[[tmpBundle
  147.                  classNamed:bundleFilenameList[ii]]alloc]init])){
  148.                     successCount++;
  149.                     [controllerList addObject:spaceTypeController];
  150.                 }
  151.             }
  152.        
  153.         }
  154.     controllerTypeCount = successCount;
  155.     }         
  156.     return self;
  157. }
  158.     
  159. static BOOL isOk(const char *filename)
  160. /* checks to make sure the filename is .bundle
  161.  */
  162. { 
  163. char *suffix;
  164.  
  165.     suffix = rindex(filename,'.');
  166.     if (suffix == 0)
  167.         return NO;
  168.     else if(strlen(suffix) != 7)
  169.         return NO;
  170.     else
  171.         return(strncmp(suffix,".bundle",7)) ? NO : YES;  
  172.  
  173. }
  174.  
  175. #define CHUNK 127
  176. static char **addFile(const char *file, int length, char **list, int count)
  177. /* Adds the specified filename to the list of filenames.  It allocates 
  178.  * more memory in chunks as needed.
  179.  */
  180. {
  181.     char *suffix;
  182.    
  183.     if (!list) list = (char **)malloc(CHUNK*sizeof(char *));
  184.     if (suffix = rindex(file,'.')) 
  185.         *suffix  = '\0';     /* strip .bundle suffix */
  186.     list[count] = (char *)malloc((length+1)*sizeof(char));
  187.     strcpy(list[count], file);
  188.     count++;
  189.     if (!(count% CHUNK)) {
  190.     list = (char **)realloc(list,(((count/CHUNK)+1)*CHUNK)*sizeof(char *));
  191.     }
  192.     list[count] = NULL;
  193.     return list;
  194. }
  195.  
  196. static void freeList(char **list)
  197. /* Frees the array of filenames
  198.  */
  199.  {
  200.     char **strings;
  201.     if (list) {
  202.     strings = list;
  203.     while (*strings) free(*strings++);
  204.     free(list);
  205.     }
  206. }
  207.  
  208.  
  209. // look in the right bundle directory for all the space object bundles
  210. // create a list called bundleFilenameList
  211. - (int)searchDirectory: (char *)directory
  212.  
  213. {
  214.     long basep;
  215.     char *buf;
  216.     struct direct *dp;
  217.     char **list = NULL;
  218.     int cc, fd, fileCount = 0;
  219.     char dirbuf[8192];
  220.  
  221.     if ((fd = open(directory, O_RDONLY, 0644)) > 0) {
  222.     cc = getdirentries(fd, (buf = dirbuf), 8192, &basep);
  223.     while (cc) {
  224.         dp = (struct direct *)buf;
  225.         
  226.         if (isOk(dp->d_name)) {
  227.         list = addFile(dp->d_name, dp->d_namlen, list, fileCount++);
  228.         }
  229.         buf += dp->d_reclen;
  230.         if (buf >= dirbuf + cc) {
  231.         cc = getdirentries(fd, (buf = dirbuf), 8192, &basep);
  232.         }
  233.     }
  234.     close(fd);
  235.     }
  236.  
  237.     freeList(bundleFilenameList);
  238.     bundleFilenameList = list;
  239.     return fileCount;
  240. }
  241.  
  242. - sizeTo:(NXCoord)width :(NXCoord)height
  243. {
  244.     [super sizeTo:width :height];
  245.  
  246.     [viewScreen sizeTo:width :height];//send original size to space
  247.     
  248.     if(controllerTypeCount > 0){
  249.         [spaceTypeController setBoundsRect:&newViewScreenSize];
  250.         NXSetRect(&clipRect,newViewScreenSize.origin.x,
  251.             newViewScreenSize.origin.y,
  252.             newViewScreenSize.size.width,newViewScreenSize.size.height);
  253.         clipRect.origin.x += 3.0;
  254.         clipRect.origin.y += 3.0;;
  255.         clipRect.size.width -= 6.0;
  256.         clipRect.size.height -= 6.0;
  257.         rectPtr = &clipRect;
  258.         
  259.     [spaceTypeController windowSizeChanged];    
  260.     
  261.     }
  262.             
  263.     return self;
  264. }
  265.  
  266.  
  267.  
  268. - initFrame:(const NXRect *)frameRect
  269. {
  270. char buf[MAXPATHLEN + 1];
  271.  
  272.     [super initFrame:frameRect];
  273.     [self allocateGState];        // For faster lock/unlockFocus
  274.     [self inspector:self];      //this guarantees that sliders exist when I
  275.                                 //set them    
  276.     moduleDir = [[NXApp delegate] moduleDirectory:"StarShip"];
  277.     strcpy(buf, moduleDir);
  278.     
  279.  
  280.     viewScreen = [[NewSpaceView alloc] initFrame:frameRect];
  281.     [viewScreen setStarShipOutlet:self];
  282.  
  283.     NXSetRect(&clipRect,newViewScreenSize.origin.x,
  284.      newViewScreenSize.origin.y,
  285.      newViewScreenSize.size.width,newViewScreenSize.size.height);
  286.     clipRect.origin.x += 3.0;
  287.     clipRect.origin.y += 3.0;;
  288.     clipRect.size.width -= 6.0;
  289.     clipRect.size.height -= 6.0;
  290.     rectPtr = &clipRect;
  291.  
  292.     
  293.     // builds list of bundle objects
  294.     [self buildControllerList:buf];
  295.     controllerIndex = 0;
  296.     spaceTypeController =  [controllerList objectAt:controllerIndex];
  297.     if([self makeSndObjects:buf]){
  298.         [spaceTypeController setPwrDownSnd:pwrDownSnd];
  299.         [spaceTypeController setPwrUpSnd:pwrUpSnd];
  300.     }
  301.     [self setModuleBox];  //update module info in inspector window    
  302.     
  303.     [spaceTypeController setBoundsRect: (NXRect *)frameRect];
  304.  
  305.     [spaceTypeController setStarsOutlet:viewScreen];
  306.  
  307.  
  308.     [viewScreen setBodyControllerOutlet:spaceTypeController];
  309.  
  310.     [self getDefaults:self];
  311.     firstTimeSound = 1;  //don't want to play sound at startup
  312.     [self setSound:soundMatrix];
  313.     [self setStarSpeed:starSpeedSlider];
  314.     [self setAnimationSpeed:animationSlider];
  315.     [self setObjectInterval:objectIntervalSlider];
  316.     [self setObjectSpeed:objectSpeedSlider];
  317.     [self setCycleCount:cycleCountSlider];
  318.     [spaceTypeController setFirstState];
  319.     
  320.     port = xmach_sleep_install();
  321.     viewScreenResized = NO;
  322.     
  323.     return self;
  324. }
  325. - setCycleCount:(Slider *)sender
  326. {
  327. int    multiplier,value;;
  328.  
  329.     // real slider value min is 0
  330.     //I show a min of 1 cycle in the cycleCountBox
  331.     value = [sender intValue];
  332.     multiplier = (int)[spaceTypeController setCycleValue:value];
  333.     if (value == 0)
  334.         value = 1;
  335.     else
  336.         value *= multiplier;
  337.     [cycleCountBox setIntValue:value];
  338.  
  339.     [self delayedDefaults:self];
  340.     return self;
  341. }
  342. - setStarSpeed:(Slider *)sender
  343. {
  344.     [viewScreen setStarSpeed:sender];
  345.     [spaceTypeController setStarSpeed:sender];
  346.     [self delayedDefaults:self];
  347.  
  348.     return self;
  349. }
  350.  
  351. - setAnimationSpeed:(Slider *)sender
  352. {
  353.     frameRate = ([sender maxValue] + [sender minValue]) - [sender intValue];
  354.     [self delayedDefaults:self];
  355.  
  356.     return self;
  357. }
  358. - setObjectSpeed:(Slider *)sender
  359. {
  360.     [spaceTypeController setObjectSpeed:sender];
  361.     [self delayedDefaults:self];
  362.  
  363.     return self;
  364. }
  365. - setObjectInterval:(Slider *)sender
  366. {
  367.     [spaceTypeController setStartInterval: sender];//send slider to current
  368.     [self delayedDefaults:self];                     //space object
  369.     return self;
  370. }
  371. - setSound:sender
  372. {
  373.  
  374.     if(soundGood){  //there are valid sound files
  375.         if(!firstTimeSound)
  376.             [sound play];
  377.         firstTimeSound = 0;
  378.         soundEnabled = (BOOL)[[sender selectedCell] tag];
  379.         [spaceTypeController setSoundEnabled:soundEnabled];
  380.     }
  381.     else{  //set all sound off permanently
  382.         soundEnabled = NO;
  383.         [spaceTypeController setSoundEnabled:soundEnabled];
  384.     
  385.     }
  386.     [self delayedDefaults:self];
  387.     
  388.     return self;
  389. }
  390. - setModuleBox
  391. {
  392.     [moduleBox setStringValue:bundleFilenameList[controllerIndex]];
  393.     return self;
  394. }
  395.  
  396.  
  397. - didLockFocus
  398. {
  399.     [viewScreen didLockFocus];
  400.     return self;
  401. }
  402.  
  403. - (const char *) windowTitle
  404. {
  405.     return("StarShip!");
  406. }
  407.  
  408. - inspector:sender
  409. {
  410.     char buf[MAXPATHLEN];
  411.     
  412.     if (!inspectorPanel)
  413.     {
  414.         sprintf(buf,"%s/English.lproj/StarShip.nib",[[NXApp delegate]
  415.         moduleDirectory:"StarShip"]);
  416.         if([NXApp loadNibFile:buf owner:self withNames:NO] == nil)
  417.             printf ("inspector not loaded %s\n",buf);
  418.     }
  419.     return inspectorPanel;
  420. }
  421.  
  422. - inspectorWillBeRemoved
  423. {
  424.     [[infoText window] orderOut:self];
  425.     return self;
  426. }
  427.  
  428. // The module is never freed
  429. // but it's here in case backSpace ever wants to ;-)
  430.  
  431. - free
  432. {
  433.     //This is untested!!!!
  434.     
  435.     [controllerList freeObjects];
  436.     [controllerList free];
  437.     [pwrDownSnd free];
  438.     [pwrUpSnd free];
  439.     [sound free];
  440.     freeList(bundleFilenameList);
  441.     xmach_sleep_remove(port);
  442.     return [super free];
  443. }
  444.  
  445.  
  446. // I left this in in case some of the modules wanted to do 
  447. //something cool with mouse
  448. //down events  - it is not functional right now
  449.  
  450. /*- mouseDown:(NXEvent *)theEvent;
  451. {
  452.     NXRect            r;
  453.     NXPoint            p;
  454.     unsigned int    i;
  455.  
  456.     p = theEvent->location;
  457.     [self convertPoint:&p fromView:nil];
  458.  
  459.     [self lockFocus];
  460.     [spaceTypeController doSomethingNow];
  461.     [self unlockFocus];
  462.  
  463.     return self;
  464. }*/
  465. //needed for mouse down events
  466. /*- newWindow
  467. {
  468.     shipWindow = [self window];
  469.     [shipWindow addToEventMask:NX_LMOUSEDOWNMASK];
  470.     return self;
  471. }*/
  472.  
  473. - delayedDefaults:sender
  474. {
  475.     [self perform:@selector(writeDefaults:) with:self afterDelay:sliderDelay
  476.      cancelPrevious:YES];
  477.     return self;
  478. }
  479.  
  480.  
  481. - getDefaults:sender
  482. {
  483. int cell;
  484.     [animationSlider setIntValue:atoi(NXGetDefaultValue([NXApp appName],
  485.      "StarShipAnimationSpeed"))];
  486.     
  487.     [objectSpeedSlider setIntValue:atoi(NXGetDefaultValue([NXApp appName],
  488.      "StarShipObjectSpeed"))];
  489.     
  490.     [starSpeedSlider setFloatValue:atof(NXGetDefaultValue([NXApp appName],
  491.      "StarShipStarSpeed"))];
  492.  
  493.  
  494.     [objectIntervalSlider setIntValue:atoi(NXGetDefaultValue([NXApp appName],
  495.      "StarShipIntervalTime"))];
  496.     
  497.     [cycleCountSlider setIntValue:atoi(NXGetDefaultValue([NXApp appName],
  498.      "StarShipCycleCount"))];
  499.  
  500.     [cycleCountBox setIntValue:atoi(NXGetDefaultValue([NXApp appName],
  501.      "StarShipCycleCount"))];
  502.     
  503.     
  504.     cell = atoi(NXGetDefaultValue([NXApp appName], "StarShipSound"));
  505.     if(cell)
  506.         [soundMatrix selectCellAt:0:0];
  507.     else
  508.         [soundMatrix selectCellAt:1:0];
  509.     return self;
  510. }
  511.  
  512. - writeDefaults:sender
  513. {
  514. int tag;
  515. char ctag[2];
  516.  
  517.     NXWriteDefault([NXApp appName], "StarShipAnimationSpeed",
  518.      [animationSlider stringValue]);
  519.     
  520.     NXWriteDefault([NXApp appName], "StarShipObjectSpeed",
  521.      [objectSpeedSlider stringValue]);
  522.  
  523.     NXWriteDefault([NXApp appName], "StarShipStarSpeed",
  524.      [starSpeedSlider stringValue]);
  525.     
  526.     NXWriteDefault([NXApp appName], "StarShipIntervalTime",
  527.      [objectIntervalSlider stringValue]);
  528.     
  529.     NXWriteDefault([NXApp appName], "StarShipCycleCount",
  530.      [cycleCountSlider stringValue]);
  531.     
  532.     tag = [[soundMatrix selectedCell] tag];
  533.     sprintf(ctag,"%d",tag);
  534.     NXWriteDefault([NXApp appName], "StarShipSound",ctag);
  535.     return self;
  536. }
  537.  
  538. port_t *xmach_sleep_install(void)
  539. {
  540.     port_t            *port;
  541.  
  542.     NX_MALLOC(port, port_t, sizeof(port_t));
  543.     port_allocate(task_self(), port);
  544.     
  545.     return(port);
  546. }
  547.  
  548. void xmach_sleep_remove(port_t *port)
  549. {
  550.     port_deallocate(task_self(), *port);
  551.     NX_FREE(port);
  552. }
  553.  
  554. void xmach_sleep(port_t *port, msg_timeout_t msecs)
  555. {
  556.     msg_header_t    h;
  557.  
  558.     h.msg_size    = sizeof(h);
  559.     h.msg_local_port = *port;
  560.  
  561.     msg_receive(&h, RCV_TIMEOUT, msecs);
  562. }
  563. - viewScreenResized:(NXRect *)screenRect
  564. {
  565.     viewScreenResized = YES;
  566.     NXSetRect(&newViewScreenSize,screenRect->origin.x,
  567.     screenRect->origin.y,screenRect->size.width, 
  568.     screenRect->size.height);
  569.     return self;
  570. }
  571. @end
  572.  
  573.  
  574.